10 POKE53280,3:POKE53281,3:POKE646,6:PRINTCHR$(147)
20 PRINT"[147]A SAMPLE PICTURE IS INCLUDED ON THIS"
25 PRINT"DISK. TO VIEW IT, CHOOSE THE LOAD (L)"
30 PRINT"OPTION AFTER RUNNING COLOR CRAFT."
35 PRINT"THEN, WHEN PROMPTED FOR A FILENAME,"
40 PRINT"TYPE FLYINGFISH AND PRESS RETURN."
70 F$="COLOR CRAFT"
80 PRINT"    PRESS ANY KEY TO RUN COLOR CRAFT[146]"
90 POKE198,0:WAIT198,1:GETDH$
100 POKE53280,14:POKE53281,14
105 PRINT"[147]":PRINTSPC(9)"LOADING COLOR CRAFT"
110 PRINT"[154]LOAD";CHR$(34);F$;CHR$(34);",8"
120 A$=CHR$(13)+"RUN[144]"+CHR$(13)
130 FORI=1TOLEN(A$):POKE630+I,ASC(MID$(A$,I)):NEXT:POKE198,I-1
140 NEW